home *** CD-ROM | disk | FTP | other *** search
/ PC World 2007 January / PCWorld_2007-01_cd.bin / v cisle / autoit / autoit-v3.2.0.1-setup.exe / Examples / Helpfile / DllStructGetData.au3 < prev    next >
Encoding:
Text File  |  2006-06-17  |  1.0 KB  |  42 lines
  1. #cs
  2. From MSDN:
  3. typedef struct _OSVERSIONINFO
  4. { 
  5.   DWORD dwOSVersionInfoSize;    //1
  6.   DWORD dwMajorVersion;         //2
  7.   DWORD dwMinorVersion;         //3
  8.   DWORD dwBuildNumber;             //4
  9.   DWORD dwPlatformId;             //5
  10.   TCHAR szCSDVersion[ 128 ];     //6
  11. } OSVERSIONINFO; 
  12. #ce
  13. $p    = DllStructCreate("dword;dword;dword;dword;dword;char[128]")
  14.  
  15. ;think of this as p->dwOSVersionInfoSize = sizeof(OSVERSIONINFO)
  16. DllStructSetData($p, 1, DllStructGetSize($p))
  17.  
  18. ;make the DllCall
  19. $ret = DllCall("kernel32.dll","int","GetVersionEx","ptr",DllStructGetPtr($p))
  20.  
  21. if Not $ret[0] Then
  22.     MsgBox(0,"DllCall Error","DllCall Failed")
  23.     exit
  24. EndIf
  25.  
  26. ;get the returned values
  27. $major        = DllStructGetData($p,2)
  28. $minor        = DllStructGetData($p,3)
  29. $build        = DllStructGetData($p,4)
  30. $platform    = DllStructGetData($p,5)
  31. $version    = DllStructGetData($p,6)
  32.  
  33. ;free the struct
  34. $p =0
  35.  
  36. msgbox(0,"","Major: " & $major & @CRLF & _
  37.             "Minor: " & $minor & @CRLF & _
  38.             "Build: " & $build & @CRLF & _
  39.             "Platform ID: " & $platform & @CRLF & _
  40.             "Version: " & $version)
  41.  
  42.